home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / listings / v_10_12 / 1012018a < prev    next >
Encoding:
Text File  |  1992-10-05  |  381 b   |  17 lines
  1. /* strspn function */
  2. #include <string.h>
  3.  
  4. size_t (strspn)(const char *s1, const char *s2)
  5.     {    /* find index of first s1[i] that matches no s2[] */
  6.     const char *sc1, *sc2;
  7.  
  8.     for (sc1 = s1; *sc1 != '\0'; ++sc1)
  9.         for (sc2 = s2; ; ++sc2)
  10.             if (*sc2 == '\0')
  11.                 return (sc1 - s1);
  12.             else if (*sc1 == *sc2)
  13.                 break;
  14.     return (sc1 - s1);    /* null doesn't match */
  15.     }
  16.  
  17.